home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Loadstar 174
/
174.d81
/
program 2
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
2022-08-26
|
205b
|
11 lines
5 rem print a status page
10 c$=chr$(10)
20 d$=chr$(27)+chr$(91)+chr$(75)+chr$(2)+chr$(0)+chr$(0)+chr$(31)
30 s$=d$+"bljstart"+c$;
40 e$="bljend"+c$;
50 open4,4,5
100 print#4,s$;
110 print#4,"@printstatuspage=on"c$;
120 print#4,e$
999 close4